home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 3 / BBS in a box - Trilogy III.iso / Files / Util / P-Pl / PASTE DARNIT! FKEY / PASTE DARNIT!.c < prev    next >
Encoding:
C/C++ Source or Header  |  1992-08-01  |  792 b   |  37 lines  |  [TEXT/KAHL]
  1. #include<Memory.h>
  2. #include<Scrap.h>
  3. #include<Types.h>
  4. #include<Events.h>
  5. #include<OSEvents.h>
  6. #include<stdio.h>
  7.  
  8. main()
  9. {
  10. Handle             htxt;
  11. int             i, c, k, errCode;
  12. long             *scrapOffset, *qElPtr, length ;
  13. unsigned char    km[16];
  14.  
  15.     for ( k=0 ; k<1 ; k++ )    /*pause for cmdKey release*/
  16.     {
  17.         GetNextEvent (everyEvent, km );
  18.         if ( km[14] == 1 )
  19.            k=-1;
  20.         else if ( km[14] == 3 )
  21.            k=-1;
  22.     }
  23.     htxt = NewHandle ( 0 );
  24.     length = GetScrap ( htxt , 'TEXT' , &scrapOffset ); /* gets clipboard  */
  25.     if ( length < 0 )
  26.         {
  27.             SysBeep ( 60 );
  28.             return;           /* stops if clipboard is empty  */
  29.         }
  30.     HLock ( htxt );               /* locks handle */
  31.     for ( i=0 ; i<length ; i++ )
  32.         {
  33.             c = (*htxt)[i];              /* read a char */
  34.             errCode = PostEvent ( keyDown, c );
  35.         }
  36.     HUnlock ( htxt );
  37. }